Celestin Apprentice 5/Apprentice-Release5.iso/Demos/Evatac Software/Preditor 3.0/Preditor Folder/Languages/Pascal/Pascal.rsrc/STR#_601.txt

Text File | 1995-11-16 | 574b | 93 lines

case  (•)
    • : begin
        •
    end

end {case{•

case

∆end else begin
•

else

∆end else if (•) begin
•

elseif

if (•) then begin
    •
end {if}•

if

repeat
    •
until (•);•

repeat

while (•) do begin
    •
end {while}•

while

for • := • to • do begin
    •
end {for}•

for

begin
    •
end•

begin

record
    •
end;•

record

var •;•

var

type •;•

type

const •;•

const

label •;•


label

•(•);
•begin
    •
end {procedure •}

•


procedure

•(•):•;
•begin
    •
end {function •}

•


function